home *** CD-ROM | disk | FTP | other *** search
/ NetNews Offline 2 / NetNews Offline Volume 2.iso / news / comp / lang / rexx / 162 < prev    next >
Encoding:
Text File  |  1996-08-06  |  1.1 KB  |  62 lines
  1. Path: lep-philips.fr!news
  2. From: cabanie@lep-philips.fr (Jean-Pierre Cabanié)
  3. Newsgroups: comp.lang.rexx
  4. Subject: Re: Calling variable procs
  5. Date: 10 Jan 1996 06:40:09 GMT
  6. Organization: Philips Microwave Limeil
  7. Distribution: inet
  8. Message-ID: <4cvn0a$c1p@procyon.lep-philips.fr>
  9. NNTP-Posting-Host: autan.lep-philips.fr
  10.  
  11. In message <4cqv96$4ce@wumpus.cc.uow.edu.au> - rap38@wumpus.cc.uow.edu.au (Perr
  12. y Andre R) writes:
  13. :>
  14. :>Is there anyway to call a proceedure that is stored
  15. :>in a variable.
  16. :>
  17. :>eg.
  18. :>
  19. :>foobar='testproc'
  20. :>
  21. :>call foobar
  22. :>exit
  23. :>
  24. :>testproc:
  25. :>    say 'Rexx is limited'
  26. :>return
  27. :>
  28. :>
  29. :>I don't want to run other scripts.  Would it be possible
  30. :>to make a library to implement this?
  31. :>
  32. :>eg.
  33. :>call VarCall foobar    /* would call whet the variable "points to" */
  34. :>
  35. :>Any suggestions would be very much appreciated.
  36. :>
  37. :>Andre.
  38. :>
  39.  
  40. What about
  41.   Proc.1 = 'Proc_1'
  42.   Proc.2 = 'Proc_2'
  43.   Do i = 1 to 2
  44.     Interpret 'Call' Proc.i
  45.   End
  46.   Exit
  47.  
  48.   Proc_1:
  49.     Say 'RexX Seems limited' ...
  50.   Return
  51.  
  52.   Proc_2:
  53.     Say 'only by your imagination'
  54.   Return
  55.  
  56. Obviously, the above code is quite tricky to compile ...
  57.  
  58. Hope this helps 
  59.  
  60. Jean-Pierre Cabani/e
  61.  
  62.